home *** CD-ROM | disk | FTP | other *** search
/ Super CD / Super CD.iso / games / game5 / dave1 / file0003._dd < prev   
Encoding:
Text File  |  1993-06-22  |  1.0 KB  |  73 lines
  1. CLS MACRO
  2. PUSH AX
  3. PUSH BX
  4. PUSH CX
  5. PUSH DX
  6. MOV CX,0
  7. MOV DH,24
  8. MOV DL,79
  9. MOV AH,6
  10. MOV AL,0
  11. MOV BH,7
  12. INT 10H
  13. POP DX
  14. POP CX
  15. POP BX
  16. POP AX
  17. ENDM
  18. STACK SEGMENT  STACK
  19. STACK      ENDS
  20. DSEG   SEGMENT
  21. MSG1 DB 'THE CHAR YOU SEARCH FOR IS:$'
  22. MSGE2 DB 30,31 DUP(?)
  23. MAT DB(?)
  24. EX DB(?)
  25. CRF DB 0DH,0AH,'$'
  26. FIND DB 'THE CHAR. IS IN THE STRING:$'
  27. NF DB 'THE CHAR IS NOT IN THE STRING:$'
  28. STR DB 'THE CHAR YOU SEARCH FOR IS:$'
  29. DSEG      ENDS
  30. CSEG SEGMENT
  31. ASSUME SS:STACK,DS:DSEG,CS:CSEG
  32. L1:SUB AX,AX
  33. PUSH AX
  34. PUSH DS
  35. CLS
  36. LEA DX,MSG1
  37. MOV AH,09H
  38. INT 21H
  39. LEA DX,MSGE2
  40. MOV AH,0AH
  41. INT 21H
  42. LEA DX,CRF
  43. INT 21H
  44. LEA DX,STR
  45. MOV AH,09H
  46. INT 21H
  47. LEA DX,MAT
  48. MOV AH,09H
  49. INT 21H
  50. LEA DX,MSGE2
  51. PUSH BX
  52. MOV AL,MAT
  53. MOV BX,0
  54. BEGIN:CMP MSGE2[BX],AL
  55. JNE LP
  56. LEA DX,FIND
  57. MOV AH,09H
  58. INT 21H
  59. JMP ENDPROG
  60. LP:INC BX
  61. LOOP BEGIN
  62. LEA DX,MSGE2
  63. ADD DX,2
  64. MOV AH,09H
  65. INT 21H
  66. LEA DX,NF
  67. MOV AH,09H
  68. INT 21H
  69. ENDPROG:MOV AX,4C00H
  70. INT 21H
  71. CSEG ENDS
  72. END L1
  73.   OBJ è!E;AMJAD   ASM {!Fé